﻿*Recoding demographics and political variables.
RECODE V912835 (1=1) (5=0) (ELSE=SYSMIS) INTO PressureToVote.
EXECUTE.
RECODE V900279 (1=1) (5=0) (ELSE=SYSMIS) INTO VoteIn1990.
EXECUTE.
RECODE V912329 (1=1) (4=1) (5=1) (2=0) (ELSE=SYSMIS) INTO PartyOrIndp.
EXECUTE.
RECODE V900547 (1=1) (2=0) (ELSE=SYSMIS) INTO Gender.
EXECUTE.
RECODE V900548 (99=SYSMIS) (ELSE=Copy) INTO Age.
EXECUTE.
COMPUTE Age1=Age/100.
EXECUTE.
RECODE V900549 (2=1) (1=0) (ELSE=SYSMIS) INTO BlackvsWhite.
EXECUTE.
RECODE V900554 (98=SYSMIS) (99=SYSMIS) (ELSE=Copy) INTO YearsEducation.
EXECUTE.
COMPUTE YearsEducation1=YearsEducation/17.
EXECUTE.
RECODE V900663 (88=SYSMIS) (98=SYSMIS) (99=SYSMIS) (0=SYSMIS) (ELSE=Copy) INTO FamilyIncome.
EXECUTE.
COMPUTE FamilyIncome1=(FamilyIncome-1)/22.
EXECUTE.
RECODE V900406 (8=SYSMIS) (9=SYSMIS) (0=SYSMIS) (ELSE=Copy) INTO LeftToRightIdeology.
EXECUTE.
COMPUTE LeftToRightIdeology0to1=(LeftToRightIdeology-1)/6.
EXECUTE.

*Creating contribution measure.
RECODE V900370 V900371 V900373 V900375 (1=1) (5=0) (ELSE=SYSMIS) INTO TaxDonation Money2Candidate 
    Money2Party Money2OtherGroup.
EXECUTE.
COMPUTE SumofConntributions=TaxDonation+Money2Candidate+Money2Party+Money2OtherGroup. 
VARIABLE LABELS  SumofConntributions 'Contributions (Tax, or money to candidate, party, group)'. 
EXECUTE.
RECODE SumofConntributions (0=0) (SYSMIS=Copy) (ELSE=1) INTO ContributeDichotomous.
VARIABLE LABELS  ContributeDichotomous 'Contributions Dichotomized (tax, candid, party, group)'.
EXECUTE.

*Regression of voting based on pressure.
LOGISTIC REGRESSION VARIABLES VoteIn1990 
  /METHOD=ENTER PressureToVote PartyOrIndp FamilyIncome1 Gender Age1 BlackvsWhite YearsEducation1 LeftToRightIdeology0to1 
  /PRINT=CI(95) 
  /CRITERIA=PIN(0.05) POUT(0.10) ITERATE(20) CUT(0.5).

*Regression of contributing based on pressure.
LOGISTIC REGRESSION VARIABLES ContributeDichotomous 
  /METHOD=ENTER PressureToVote PartyOrIndp FamilyIncome1 Gender Age1 BlackvsWhite YearsEducation1 LeftToRightIdeology0to1 
  /PRINT=CI(95) 
  /CRITERIA=PIN(0.05) POUT(0.10) ITERATE(20) CUT(0.5).

*Computing descriptive stats.
COMPUTE ContrAllVariables=PressureToVote+PartyOrIndp+FamilyIncome1+Gender+Age1+BlackvsWhite+
    YearsEducation1+LeftToRightIdeology0to1+ContributeDichotomous.
EXECUTE.
COMPUTE VoteAllVariables=PressureToVote+PartyOrIndp+FamilyIncome1+Gender+Age1+BlackvsWhite+
    YearsEducation1+LeftToRightIdeology0to1+VoteIn1990.
EXECUTE.
RECODE VoteAllVariables ContrAllVariables (SYSMIS=0) (ELSE=1).
EXECUTE.
USE ALL. 
FILTER BY ContrAllVariables. 
EXECUTE. 
FREQUENCIES VARIABLES=PartyOrIndp Gender BlackvsWhite V912329 
  /ORDER=ANALYSIS.
EXAMINE VARIABLES=FamilyIncome1 Age1 YearsEducation1 
  /PLOT BOXPLOT STEMLEAF 
  /COMPARE GROUPS 
  /STATISTICS DESCRIPTIVES 
  /CINTERVAL 95 
  /MISSING LISTWISE 
  /NOTOTAL.
EXAMINE VARIABLES=V900554 V900663 
  /PLOT BOXPLOT STEMLEAF 
  /COMPARE GROUPS 
  /STATISTICS DESCRIPTIVES 
  /CINTERVAL 95 
  /MISSING LISTWISE 
  /NOTOTAL.
